home *** CD-ROM | disk | FTP | other *** search
- ;
- ; installer script for BigTime V1.0
- ;
-
- (transcript "Installation of BigTime")
-
- (set destdir
- (askdir
- (prompt "Select destination of BigTime directory.")
- (help "Choose location for BigTime directory and modules.")
- (default @default-dest)
- (disk)
- )
- )
-
- (set @default-dest destdir)
- (set destdir (tackon destdir "BigTime"))
-
- (makedir destdir
- (infos)
- )
-
- (makedir (tackon destdir "Units")
- (infos)
- )
-
- (copylib
- (prompt "Copying AppLauncher.library to Libs:")
- (help @copylib-help)
- (source "libs/AppLauncher.library")
- (dest "Libs:")
- (confirm)
- )
-
- (copyfiles
- (prompt (cat "Copying BigTime and Documentation to " destdir ) )
- (help @copyfiles-help)
- (source "")
- (infos)
- (pattern "~(install#?)")
- (dest destdir)
- (files)
- )
-
- (copyfiles
- (prompt (cat "Copying Bin to " destdir ) )
- (help @copyfiles-help)
- (all)
- (source "Bin")
- (infos)
- (dest (tackon destdir "Bin"))
- )
-
- (set destdir (tackon destdir "Units"))
-
- (makedir (tackon destdir "ClockFaces")
- (infos)
- )
-
- (copyfiles
- (prompt (cat "Copying Units to " destdir ) )
- (source "Units")
- (infos)
- (pattern "#?")
- (dest destdir)
- (files)
- )
-
- (copyfiles
- (prompt "Select ClockFaces to Install" )
- (help "Select the ClockFaces you want installed.")
- (source "Units/ClockFaces")
- (dest (tackon destdir "ClockFaces"))
- (infos)
- (files)
- (all)
- (confirm)
- )
-
- (set destdir (tackon @default-dest "BigTime"))
-
- (if (askbool
- (prompt "Are you registered?")
- (help "Allows NAME and PASS tooltypes to be set.")
- (default 0) )
- (
- (tooltype
- (dest (tackon destdir "BigTime"))
- (settooltype "NAME" (askstring (prompt "Enter your NAME.") (help "Enter your NAME for Samplex ToolType") ))
- (settooltype "PASS" (askstring (prompt "Enter your PASS.") (help "Enter your PASS for Samplex ToolType") ))
- )
- )
- )
-
- (if (askbool
- (prompt "Do you want to run BigTime from WBStartup")
- (help "Sets tooltype and copys launch module to WBStartup drawer")
- (default 0) )
-
- (
- (copyfiles
- (source (tackon destdir "BigTime"))
- (dest "SYS:WBStartup")
- (infos)
- (files)
- )
- (tooltype
- (dest "SYS:WBStartup/BigTime")
- (settooltype "UNITDIR" (tackon destdir "Units") )
- )
- )
-
- (if (askbool
- (prompt "Do you want to run BigTime from User-Startup")
- (help "Adds script to launch BigTime from User-Startup")
- (default 0) )
- (
- (startup "BigTime"
- (prompt "Add script to launch BigTime from User-Startup")
- (help "Adds script to launch BigTime from User-Startup")
- (command (cat"run >NIL: <NIL: "(tackon destdir "BigTime")))
- )
- )
- )
- )
-
-